home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Collection of Tools & Utilities
/
Collection of Tools and Utilities.iso
/
keyb
/
keykill.zip
/
DEBOOT.BAS
next >
Wrap
BASIC Source File
|
1989-12-13
|
682b
|
18 lines
2 OPEN "deboot.com" FOR OUTPUT AS 1
3 FOR I = 1 TO 123 : READ BYTE
4 PRINT#1, CHR$(BYTE); : NEXT I : CLOSE 1
5 PRINT "DEBOOT.COM created. Type SYSTEM to leave Basic."
11 DATA 235,62,144,0,0,0,0,251,80,30
12 DATA 228,96,60,83,117,40,184,64,0,142
13 DATA 216,160,23,0,138,224,36,12,60,12
14 DATA 117,9,128,228,247,136,38,23,0,235
15 DATA 15,138,196,36,10,60,10,117,7,128
16 DATA 204,4,136,38,23,0,31,88,250,46
17 DATA 255,46,3,1,184,9,53,205,33,137
18 DATA 30,3,1,140,192,163,5,1,186,7
19 DATA 1,184,9,37,205,33,180,9,186,101
20 DATA 1,205,33,186,20,0,184,0,49,205
21 DATA 33,13,10,68,69,66,79,79,84,32
22 DATA 105,110,115,116,97,108,108,101,100,46
23 DATA 13,10,36